unit uExceptionAutenticacao;

interface

uses
  System.StrUtils, System.SysUtils, uExceptionSistemaBanco;

type
  EAutenticacao = class(ESistemaBanco)
  private
    FHorario : TDateTime;
  public

    constructor create(MsgErro : String; Horario : TDateTime);
    property Horario : TDateTime read FHorario write FHorario;
  end;

implementation

constructor EAutenticacao.create(MsgErro : String; Horario : TDateTime);
begin
  self.Horario := Horario;
  self.Message := MsgErro;
end;

end.
